From 0ef10ef6fe62a42538a372f4381504d7cff0b87e Mon Sep 17 00:00:00 2001 From: Markus Rost Date: Wed, 2 Oct 2002 16:32:15 +0000 Subject: [PATCH] (normal-top-level): Reset standard-value of `user-full-name' here. --- lisp/startup.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lisp/startup.el b/lisp/startup.el index eb8ce6e8418..99de8ff30d1 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -429,6 +429,9 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'." (save-excursion (set-buffer (get-buffer "*Messages*")) (setq default-directory dir))) + ;; `user-full-name' is now known; reset its standard-value here. + (put 'user-full-name 'standard-value + (list (default-value 'user-full-name))) ;; For root, preserve owner and group when editing files. (if (equal (user-uid) 0) (setq backup-by-copying-when-mismatch t)) -- 2.30.2